home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FishMarket 1.0
/
FishMarket v1.0.iso
/
fishies
/
376-400
/
disk_385
/
mortcalc
/
mc26.h
< prev
next >
Wrap
C/C++ Source or Header
|
1992-05-06
|
9KB
|
798 lines
struct Image FillImage = {
0,10,
640,512,
2,
NULL,
0,
1,
NULL
};
struct Gadget FillGadg = {
NULL,
0,0,
0,0,
GADGIMAGE,
NULL,
BOOLGADGET,
(APTR)&FillImage,
NULL, NULL, NULL, NULL, NULL, NULL
};
UBYTE Gadget17SIBuff[35] =
"Welcome! PAYMENT selected";
struct StringInfo Gadget17SInfo = {
Gadget17SIBuff,
NULL,
0,
35,
0,
0,0,0,0,0,
0,
0,
NULL
};
SHORT BorderVectors5[] = {
0,0,
257,0,
257,9,
0,9,
0,0
};
struct Border Border5 = {
-1,-1,
2,1,JAM1,
5,
BorderVectors5,
NULL
};
struct Gadget Gadget17 = {
&FillGadg,
132,118,
263,8,
NULL,
GADGIMMEDIATE+RELVERIFY,
STRGADGET,
(APTR)&Border5,
NULL,
NULL,
NULL,
(APTR)&Gadget17SInfo,
NULL,
NULL
};
UBYTE Gadget16SIBuff[18] = "$ 5858.09 ";
struct StringInfo Gadget16SInfo = {
Gadget16SIBuff,
NULL,
0,
18,
0,
0,0,0,0,0,
0,
0,
NULL
};
SHORT BorderVectors6[] = {
0,0,
113,0,
113,9,
0,9,
0,1
};
struct Border Border6 = {
-1,-1,
2,1,COMPLEMENT,
5,
BorderVectors6,
NULL
};
struct Gadget Gadget16 = {
&Gadget17,
274,102,
118,9,
NULL,
NULL,
STRGADGET,
(APTR)&Border6,
NULL,
NULL,
NULL,
(APTR)&Gadget16SInfo,
NULL,
NULL
};
UBYTE Gadget15SIBuff[18] = "$ 132.15 ";
struct StringInfo Gadget15SInfo = {
Gadget15SIBuff,
NULL,
0,
18,
0,
0,0,0,0,0,
0,
0,
NULL
};
SHORT BorderVectors1[] = {
0,0,
113,0,
113,9,
0,9,
0,1
};
struct Border Border1 = {
-1,-1,
2,1,COMPLEMENT,
5,
BorderVectors1,
NULL
};
struct Gadget Gadget15 = {
&Gadget16,
133,102,
118,9,
NULL,
GADGIMMEDIATE+RELVERIFY,
STRGADGET,
(APTR)&Border1,
NULL,
NULL,
NULL,
(APTR)&Gadget15SInfo,
NULL,
NULL
};
UBYTE Gadget14SIBuff[18] = "$ 0.00 ";
struct StringInfo Gadget14SInfo = {
Gadget14SIBuff,
NULL,
0,
18,
0,
0,0,0,0,0,
0,
0,
NULL
};
SHORT BorderVectors7[] = {
0,0,
113,0,
113,9,
0,9,
0,1
};
struct Border Border7 = {
-1,-1,
2,1,COMPLEMENT,
5,
BorderVectors7,
NULL
};
struct Gadget Gadget14 = {
&Gadget15,
133,87,
118,9,
NULL,
GADGIMMEDIATE+RELVERIFY,
STRGADGET,
(APTR)&Border7,
NULL,
NULL,
NULL,
(APTR)&Gadget14SInfo,
NULL,
NULL
};
UBYTE Gadget13SIBuff[18] =
" 10 yrs 0 mo.";
struct StringInfo Gadget13SInfo = {
Gadget13SIBuff,
NULL,
0,
18,
0,
0,0,0,0,0,
0,
0,
NULL
};
SHORT BorderVectors8[] = {
0,0,
113,0,
113,9,
0,9,
0,1
};
struct Border Border8 = {
-1,-1,
2,1,COMPLEMENT,
5,
BorderVectors8,
NULL
};
struct Gadget Gadget13 = {
&Gadget14,
132,72,
118,9,
NULL,
GADGIMMEDIATE+RELVERIFY,
STRGADGET,
(APTR)&Border8,
NULL,
NULL,
NULL,
(APTR)&Gadget13SInfo,
NULL,
NULL
};
UBYTE Gadget12SIBuff[18] =
" 10.00 % ";
struct StringInfo Gadget12SInfo = {
Gadget12SIBuff,
NULL,
0,
18,
0,
0,0,0,0,0,
0,
0,
NULL
};
SHORT BorderVectors9[] = {
0,0,
113,0,
113,9,
0,9,
0,1
};
struct Border Border9 = {
-1,-1,
2,1,COMPLEMENT,
5,
BorderVectors9,
NULL
};
struct Gadget Gadget12 = {
&Gadget13,
132,57,
118,9,
NULL,
GADGIMMEDIATE+RELVERIFY,
STRGADGET,
(APTR)&Border9,
NULL,
NULL,
NULL,
(APTR)&Gadget12SInfo,
NULL,
NULL
};
UBYTE Gadget11SIBuff[18] =
"$ 10,000.00 ";
struct StringInfo Gadget11SInfo = {
Gadget11SIBuff,
NULL,
0,
18,
0,
0,0,0,0,0,
0,
0,
NULL
};
SHORT BorderVectors12[] = {
0,0,
113,0,
113,9,
0,9,
0,1
};
struct Border Border12 = {
-1,-1,
2,1,COMPLEMENT,
5,
BorderVectors12,
NULL
};
struct Gadget Gadget11 = {
&Gadget12,
133,42,
118,9,
NULL,
GADGIMMEDIATE+RELVERIFY,
STRGADGET,
(APTR)&Border12,
NULL,
NULL,
NULL,
(APTR)&Gadget11SInfo,
NULL,
NULL
};
UBYTE Gadget10SIBuff[5] = "1 ";
struct StringInfo Gadget10SInfo = {
Gadget10SIBuff,
NULL,
0,
5,
0,
0,0,0,0,0,
0,
0,
NULL
};
SHORT BorderVectors3[] = {
0,0,
25,0,
25,9,
0,9,
0,0
};
struct Border Border3 = {
-1,-1,
2,1,JAM1,
5,
BorderVectors3,
NULL
};
struct Gadget Gadget10 = {
&Gadget11,
405,57,
28,8,
NULL,
GADGIMMEDIATE+RELVERIFY+LONGINT,
STRGADGET,
(APTR)&Border3,
NULL,
NULL,
NULL,
(APTR)&Gadget10SInfo,
NULL,
NULL
};
SHORT BorderVectors2[] = {
0,0,
60,0,
60,10,
0,10,
0,0
};
struct Border Border2 = {
-1,-1,
2,1,JAM1,
5,
BorderVectors2,
NULL
};
struct IntuiText IText1 = {
2,1,JAM2,
9,1,
NULL,
(UBYTE *)"U.S.A.",
NULL
};
struct Gadget Gadget9 = {
&Gadget10,
272,41,
59,9,
SELECTED,
GADGIMMEDIATE+RELVERIFY+TOGGLESELECT,
BOOLGADGET,
(APTR)&Border2,
NULL,
&IText1,
NULL,
NULL,
NULL,
NULL
};
SHORT BorderVectors10[] = {
0,0,
97,0,
97,10,
0,10,
0,0
};
struct Border Border10 = {
-1,-1,
2,1,JAM1,
5,
BorderVectors10,
NULL
};
struct IntuiText IText3 = {
2,1,JAM2,
15,1,
NULL,
(UBYTE *)"Calculate",
NULL
};
struct Gadget Gadget8 = {
&Gadget9,
422,118,
96,9,
NULL,
GADGIMMEDIATE+RELVERIFY,
BOOLGADGET,
(APTR)&Border10,
NULL,
&IText3,
NULL,
NULL,
NULL,
NULL
};
SHORT BorderVectors4[] = {
0,0,
97,0,
97,10,
0,10,
0,0
};
struct Border Border4 = {
-1,-1,
2,1,JAM1,
5,
BorderVectors4,
NULL
};
struct IntuiText IText2 = {
2,1,JAM2,
24,1,
NULL,
(UBYTE *)"Print",
NULL
};
struct Gadget Gadget7 = {
&Gadget8,
422,102,
96,9,
NULL,
GADGIMMEDIATE+RELVERIFY+TOGGLESELECT,
BOOLGADGET,
(APTR)&Border4,
NULL,
&IText2,
NULL,
NULL,
NULL,
NULL
};
SHORT BorderVectors11[] = {
0,0,
60,0,
60,10,
0,10,
0,0
};
struct Border Border11 = {
-1,-1,
2,1,JAM1,
5,
BorderVectors11,
NULL
};
struct IntuiText IText4 = {
2,1,JAM2,
5,1,
NULL,
(UBYTE *)"CANADA",
NULL
};
struct Gadget Gadget6 = {
&Gadget7,
370,41,
59,9,
NULL,
GADGIMMEDIATE+RELVERIFY+TOGGLESELECT,
BOOLGADGET,
(APTR)&Border11,
NULL,
&IText4,
NULL,
NULL,
NULL,
NULL
};
SHORT BorderVectors13[] = {
0,0,
96,0,
96,10,
0,10,
0,0
};
struct Border Border13 = {
-1,-1,
2,1,JAM1,
5,
BorderVectors13,
NULL
};
struct IntuiText IText5 = {
2,1,JAM2,
16,1,
NULL,
(UBYTE *)"Payment",
NULL
};
struct Gadget Gadget5 = {
&Gadget6,
22,101,
95,9,
SELECTED,
GADGIMMEDIATE+RELVERIFY+TOGGLESELECT,
BOOLGADGET,
(APTR)&Border13,
NULL,
&IText5,
NULL,
NULL,
NULL,
NULL
};
SHORT BorderVectors14[] = {
0,0,
96,0,
96,10,
0,10,
0,0
};
struct Border Border14 = {
-1,-1,
2,1,JAM1,
5,
BorderVectors14,
NULL
};
struct IntuiText IText6 = {
2,1,JAM2,
16,1,
NULL,
(UBYTE *)"Balance",
NULL
};
struct Gadget Gadget4 = {
&Gadget5,
23,86,
95,9,
NULL,
GADGIMMEDIATE+RELVERIFY+TOGGLESELECT,
BOOLGADGET,
(APTR)&Border14,
NULL,
&IText6,
NULL,
NULL,
NULL,
NULL
};
SHORT BorderVectors15[] = {
0,0,
98,0,
98,10,
0,10,
0,0
};
struct Border Border15 = {
-1,-1,
2,1,JAM1,
5,
BorderVectors15,
NULL
};
struct IntuiText IText7 = {
2,1,JAM2,
15,1,
NULL,
(UBYTE *)"Period",
NULL
};
struct Gadget Gadget3 = {
&Gadget4,
22,71,
97,9,
NULL,
GADGIMMEDIATE+RELVERIFY+TOGGLESELECT,
BOOLGADGET,
(APTR)&Border15,
NULL,
&IText7,
NULL,
NULL,
NULL,
NULL
};
SHORT BorderVectors16[] = {
0,0,
98,0,
98,10,
0,10,
0,0
};
struct Border Border16 = {
-1,-1,
2,1,JAM1,
5,
BorderVectors16,
NULL
};
struct IntuiText IText8 = {
2,1,JAM2,
13,1,
NULL,
(UBYTE *)"Rate",
NULL
};
struct Gadget Gadget2 = {
&Gadget3,
22,56,
97,9,
NULL,
GADGIMMEDIATE+RELVERIFY+TOGGLESELECT,
BOOLGADGET,
(APTR)&Border16,
NULL,
&IText8,
NULL,
NULL,
NULL,
NULL
};
SHORT BorderVectors17[] = {
0,0,
99,0,
99,10,
0,10,
0,0
};
struct Border Border17 = {
-1,-1,
2,1,JAM1,
5,
BorderVectors17,
NULL
};
struct IntuiText IText9 = {
2,1,JAM2,
16,1,
NULL,
(UBYTE *)"Principal",
NULL
};
struct Gadget Gadget1 = {
&Gadget2,
21,41,
98,9,
NULL,
GADGIMMEDIATE+RELVERIFY+TOGGLESELECT,
BOOLGADGET,
(APTR)&Border17,
NULL,
&IText9,
NULL,
NULL,
NULL,
NULL
};
#define GadgetList1 Gadget1
struct IntuiText IText17 = {
2,1,JAM2,
133,130,
NULL,
(UBYTE *)"Hit right Amiga-X to clear a box",
NULL
};
struct IntuiText IText16 = {
2,1,JAM2,
437,57,
NULL,
(UBYTE *)"month(s)",
&IText17
};
struct IntuiText IText15 = {
2,1,JAM2,
276,57,
NULL,
(UBYTE *)"Compounded over ",
&IText16
};
struct IntuiText IText12 = {
2,1,JAM2,
66,118,
NULL,
(UBYTE *)"STATUS:",
&IText15
};
struct IntuiText IText11 = {
2,1,JAM2,
23,21,
NULL,
(UBYTE *)"Mortgage Calculator v2.5 »**« Michel Laliberté, August 1990",
&IText12
};
struct IntuiText IText10 = {
2,1,JAM2,
292,88,
NULL,
(UBYTE *)"Interest",
&IText11
};
#define IntuiTextList1 IText10
struct NewWindow NewWindowStructure1 = {
26,36,
543,143,
0,1,
GADGETUP+GADGETDOWN+CLOSEWINDOW+RAWKEY,
WINDOWDRAG+WINDOWDEPTH+WINDOWCLOSE+ACTIVATE,
&Gadget1,
NULL,
(UBYTE *)"MortCalc",
NULL,
NULL,
5,5,
640,200,
WBENCHSCREEN
};